Top 10k strings from MicroHobby Semanal - Issue 045-048 (1985)(Hobby Press)(es)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

  16 y,x;a$(n);
   5 punt=punt+100
   5 ky,kx;" ";
   5 fv,cv;d$(1
   5 fb,cb;d$(1
   5 ;"PARE LA CINTA":
   5                               
   4 y,x;a$(n):
   4 ;"VIDAS:";vid;
   4 ;"RECORD:";rec
   4 ;"PUNTOS:";punt;
   4  *                *
   3 ;"PULSE UNA TECLA":
   3 ;" PARE LA CINTA ":
   3 ;"         "
   3 ;"                                ":
   3 *((d-b)/(c-a))
   2 pun=pun+50
   2 l$=".---":
   2 l$="-..-":
   2 b$="             "
   2 INSTRUCCIONES
   2 ;"CONSTANTE":
   2 ;" PERSONAL "
   2 ;" CANASTA "
   2 ;"          "
   2 ,"                                ",0
   2 *** Salto ***
   2 *** Disparo ***
   2 (NPROG/DOS)
   2 "22",CERO;B$:
   2  Salto/Disparo 
   1 zf=(yf*de)/
   1 z$="00000"
   1 yf=(np*a(5
   1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz                                                                                                
   1 punt=punt+1000
   1 pun=pun+100
   1 m$=" SOLO TENGO UN DATO":
   1 m$=" O.K. STACK 'X' EN MEMORIA "+c$:
   1 m$=" O.K. RESULTADO EN STACK 'X'":
   1 m$=" O.K. ORDENADA EN ORIGEN EN 'X'  PENDIENTE EN 'Y', COEFICIENTE   DE CORRELACCION EN 'Z'         ":
   1 m$=" O.K. MEDIA EN 'X' , DESCIACION  TIPICA (STD) EN 'Y', COEFI-     CIENTE DE VARIACION EN 'Z'     ":
   1 m$=" O.K. LAS MEMORIAS 7,8Y9 ESTAN   EN UN ARRAY 'R(1,2Y3)', PUEDE   INTRODUCIR SUMANDOS            "
   1 m$=" O.K. FIJO "+
   1 m$=" NO EXISTE ESA MEMORIA"
   1 m$=" M(7)=n; M(8)=
   1 m$=" CALCULADORA PREPARADA":
   1 l$=".....":
   1 l$="....-":
   1 l$="....":
   1 l$="...--":
   1 l$="...-":
   1 l$="..-.":
   1 l$="..--..":
   1 l$="..---":
   1 l$=".-..-.":
   1 l$=".-..":
   1 l$=".--.":
   1 l$=".----":
   1 l$="-....":
   1 l$="-...-":
   1 l$="-.-.-.":
   1 l$="-.-.":
   1 l$="-.--":
   1 l$="--...":
   1 l$="--..":
   1 l$="--.-":
   1 l$="---...":
   1 l$="---..":
   1 l$="----.":
   1 l$="-----":
   1 fv2,cv2;d$(1
   1 fb2,cb2;d$(1
   1 f+" DECIMALES"
   1 f$="este espacio esta reservado para una frase o una serie de datos que puedes imtroducir tu, -rompiendo- el progama y copiandolo en la linea 6000.":
   1 d$=" O PROMEDIE EL SUMATORIO"
   1 d$=" CALCULAR, SEGUIDA DE 'ENTER'":
   1 c$=" INTRODUZCA SIGUIENTE DATO":
   1 c$=" INTRODUZCA LA EXPRESION A":
   1 a8,b8;" ";
   1 a6,b6;" ";
   1 a5,b5;" ";
   1 a4,b4;" ";
   1 a3,b3;" ";
   1 a2,b2;" ";
   1 a$="PULSA UNA TECLA PARA CONTINUAR..":
   1 ^f)+0.55555
   1 UNO;"PONGA EN MARCHA LA CINTA";
   1 Transfer  
   1 TZX por Manuel Gomez Amate
   1 TU MISION:
   1 T(E)=T(E)+1
   1 SPACE-UNO,X1
   1 SPACE-UNO,CERO:
   1 SPACE,LINEA:
   1 SPACE,CERO:
   1 SOLTAR ULTIMA LLAVE
   1 SOLTAR LLAVE
   1 R(n)=M(n+6
   1 PRESENTACION
   1 P(I)=P(I)+
   1 Morselan  
   1 Micro-cal 
   1 MOVIMIENTO DEL MALO
   1 MOVIMIENTO
   1 MICROHOBBY
   1 MICRO-CALC
   1 MICRO     
   1 INIALIZACION
   1 I,CERO;,,:
   1 Hobby Press
   1 HAS TENIDO MUCHA SUERTE!      ENCONTRASTES EL TESORO DE LAS             10 LLAVES.";
   1 EN BUSCA DEL COFRE
   1 DOS=UNO+UNO
   1 DISTRIBUYE A SUBRUTINAS
   1 Cofre     "'
   1 Castellano
   1 Cargador  f
   1 Caja      
   1 CINTA 12 CARA A
   1 CERO;"       ";
   1 CARAA     &
   1 C$="  Por favor, elija un programa  "
   1 Buzo      Z
   1 Boggle    
   1 Basket    
   1 B$="                       7-AL FINAL DE CADA PARTIDA  CADA JUGADOR DEBE TECLEAR LAS   PALABRAS QUE HA ENCONTRADO    Y EL  ORDENADOR SE ENCARGA DE ANO-TAR LOS PUNTOS                      8- CUANTO MAS LARGAS SON LASPALABRAS MAYOR ES SU VALOR         9- EL ORDENADOR SE ENCARGA DECONTROLAR EL TIEMPO Y DE  PROPO-NER LA COMBINACION DE 16 LETRAS    10- PARA INTRODUCIR LAS PALA-BRAS ENCONTRADAS ESPERAREMOS A  QUE EL ORDENADOR NOS LO PIDA TE-CLEANDOLAS EN ESE MOMENTO; CUAN-DO YA NO TENGAMOS MAS PALABRAS, PULSAREMOS 'ENTER'                 AHORA EMPIEZA LA PARTIDA                SUERTE !!"
   1 B$="                                "
   1 Anillos   
   1 AS DE LAS CUEVAS                                              LAS TECLAS SON:   Q...ARRIBA                      A...ABAJO                       O...IZQUIERDA                   P...DERECHA                                                                   PULSA UNA TECLA PARA CONTINUAR.."
   1 A(I)=B(I):
   1 A$="                      1- EN APROXIMADAMENTE 3 MINU-TOS CADA JUGADOR DEBE ANOTAR EN UN PAPEL EL MAXIMO DE PALABRAS  POSIBLES,   COMBINANDO  LAS  LE-TRAS PROPUESTAS                    2- LAS PALABRAS DEBEN TENER  MAS DE 3 LETRAS                    3- LAS LETRAS QUE COMPONEN   UNA PALABRA DEBEN SER CONTIGUAS POR SUS LADOS O POR SUS ANGULOS    4- LA PALABRA DEBE PODER SER DELETREADA EN SU CORRECTO ORDEN ORTOGRAFICO                        5- DENTRO DE UNA PALABRA CADALETRA SOLO PUEDE SER UTILIZADA  UNA VEZ                            6- PODRAN JUGAR DE 1 A 7 JU- GADORES                  "
   1 ="L")-(378
   1 ;m$'c$'d$:
   1 ;N$(I);" : ";P(I)
   1 ;"y pulsa -ENTER-."
   1 ;"o una rapida(C). Elige la opcion";
   1 ;"locidad lenta (A),una normal (B)";
   1 ;"X...El numero no figura en           la combinacion.            *...Numero acertado,posi-            cion incorrecta.           ^...Numero acertado,posi-            cion correcta."
   1 ;"VIDAS:";li;
   1 ;"VIDAS:  ";:
   1 ;"TU TE LO PIERDES":
   1 ;"TU ERES UN ANILLO INFILTRADO EN LAS GALERIAS DE UNA CUEVA.ESTAS EN ESTA CUEVA PUES HAS PERDIDO  EL DEDO DE TU AMO.AL VER TANTOS DEDOS ALLI DECIDES RECUPERARLOS PERO TU MISION SE VERA OBSTRUIDAPOR LA PRESENCIA DE LAS CRUELES U
   1 ;"TIME: ";
   1 ;"TIENES QUE VOLVER A LA GRUTA    DENTRO DE";
   1 ;"TIEMPO : ";
   1 ;"SON DEMASIADAS LETRAS PARA BORRAR":
   1 ;"SILENCIO !"
   1 ;"SE ACABO!!":
   1 ;"RECORD:";r;"$"
   1 ;"QUIERES JUGAR OTRA VEZ?";
   1 ;"QUE PASA? TU AMO SE HA PERDIDO  OTRA VEZ. TIENES QUE RECUPERARLO"
   1 ;"QUE BIEN!! HAS ENCONTRADO TU AMO"
   1 ;"Q...Ariba.";
   1 ;"PUNTUACIONES"
   1 ;"PUNTOS:00000";
   1 ;"PUNTOS:";pun;
   1 ;"PUNTOS:  ";punt:
   1 ;"PUNTO NUMERO";(n)'"ABCISA ? : ";xx
   1 ;"PUNTO NUMERO ";(n)'"ORDENADA ? : ";yy
   1 ;"PULSE CUALQUIER TECLA."
   1 ;"PULSA UNA TECLA";
   1 ;"PULSA (S) O (N)"
   1 ;"PASASTE LA GRUTA <<";pant;">> !!!!...."
   1 ;"PANTALLA ";pan;
   1 ;"PALABRAS ? "
   1 ;"P...Derecha."
   1 ;"O...Izquireda.";
   1 ;"NECESITAS INSTRUCCIONES? (s/n)":
   1 ;"MORSILANDIA";
   1 ;"MINUSCULAS";
   1 ;"MICRO-CALC"
   1 ;"MEMORIAS";
   1 ;"MAX.:00000";
   1 ;"LO SIENTO. NO HAS RECUPERADO A  TU AMO. OTRA VEZ SERA."
   1 ;"LO SIENTO LE HAN COGIDO";
   1 ;"LO LOGRASTE!!":
   1 ;"LETRA  : ";
   1 ;"L     D";
   1 ;"JUGAMOS OTRA (S/N)?"
   1 ;"JUGADOR ";I;" ";N$(I,1
   1 ;"INTRODUZCA LOS NUMEROS"
   1 ;"INTECTOS"
   1 ;"INSTRUCCIONES";
   1 ;"INSTRUCCIONES":
   1 ;"INDICACIONES :"
   1 ;"IN FRAGANTI."
   1 ;"HAS SUPERADO EL ANTERIOR RECORD":
   1 ;"GUARDIANES DEL TESORO.........
   1 ;"F         S";
   1 ;"Es usted un ladron..."
   1 ;"EL TESORO ES SUYO":
   1 ;"EL RECORD ES ";rec:
   1 ;"E       E";
   1 ;"DINERO";
   1 ;"DESCANSE EN PAZ";
   1 ;"DEBES DE TENER CUIDADO CON:";
   1 ;"DEBES BUSCAR A LO LARGO DE    TODO EL LABERINTO DE UNA EN     UNA LAS DIEZ LLAVES QUE TE      ABRIRAN  EL COFRE QUE TE HARA   RICO.":
   1 ;"Correcto, Puede grabar el codigo"''"Su version es de ";48
   1 ;"Cinta en REC', Pulse una tecla"
   1 ;"Cinta en PLAY' para verificar"
   1 ;"Cinta en 'REC', pulse una tecla "
   1 ;"Cinta en 'PLAY' para verificar "
   1 ;"CHIRONA"
   1 ;"CENTINELAS DEL LABERINTO......
   1 ;"Buena suerte!!"
   1 ;"Banco  Central"
   1 ;"BOGGLE";
   1 ;"Antes de cargar el codigo en susprogramas, teclee:"'"CLEAR ";58431
   1 ;"ANILLO LOCO":
   1 ;"A...Abajo.";
   1 ;"3. PROFESIONAL ?"
   1 ;"20 SEGUNDOS"
   1 ;"2. AFICIONADO ?";
   1 ;"1. PRINCIPIANTE ?";
   1 ;"-------------";
   1 ;"****Para oir las tuyas, escribe-    las y presiona-ENTER-. Cuan-    do las hayas oido, pulsa una    tecla."
   1 ;"****Para oir la frase que tienes    guardada, pulsa '`' y despu-    es, pulsa -ENTER-."
   1 ;"****Para cambiar la velocidad,      pulsa el signo '^' y, despu-    es, pulsa -ENTER-."
   1 ;"****LO  MAS  IMPORTANTE:por fa-     vor, las frases escribelas      en ";
   1 ;"**** Puedes elegir entre una ve-";
   1 ;"$$$$$$$"
   1 ;" SI SOLO ME DA UN PUNTO, TOMO"'" EL OTRO COMO 0,0":
   1 ;" PULSE UNA TECLA PARA CONTINUAR":
   1 ;" PULSE 'ENTER' PARA SEGUIR"
   1 ;" PARA LA CINTA ":
   1 ;" O.K. DETENGO EL PROGRAMA.       PARA LISTAR PULSE 'K' Y 'ENTER' PARA SEGUIR PULSE 'C' Y 'ENTER'":
   1 ;" O.K. AJUSTE DE RECTA":
   1 ;" BRAVO !"
   1 ;"  Esta usted delante de la caja fuerte del banco Central.Averi- gue la combinacion en el menor  numero de intentos posible y    antes de que llegue la policia."
   1 ;"   PULSA UNA TECLA    "
   1 ;"     STOP    ";
   1 ;"     ESPACE VUELVE A MENU     "
   1 ;"        "
   1 ;"         ERROR EN DATAS         "
   1 ;"         ALTO POLICIA !         "
   1 ;"                ";
   1 ;"                ":
   1 ;"                  "
   1 ;"                                ";
   1 ;"             
   1 2100401158E401001BEDB0C92158E411004001001BEDB0C9s
   1 ,D.L.: M-36598-84
   1 ,"Pulsa una tecla para empezar...."
   1 ,"      Por Carlos Cervera      "
   1 ,"                                ",5
   1 ,"                                ",4
   1 ,"                                "
   1 *v;"K."''"Para guardar una pantalla:"'"RANDOMIZE USR ";58432
   1 *v''"Para recuperarla:"'"RANDOMIZE USR ";58444
   1 *v''"Para cargar el codigo, teclee:"'"LOAD ""C/M""CODE"
   1 *** NIVEL 2 ***
   1 *** NIVEL 1 ***
   1 *** CINTA-MICROHOBBY ***
   1 ** NIVEL 4 **
   1 ** NIVEL 3 **
   1 ** Movimiento **
   1 *(b$="SC")+1500
   1 *(b$="PR")+1800
   1 *(b$="ME")+1000
   1 *(b$="DE")+1100
   1 *(b$="BM")+900
   1 *(b$="AJ")
   1 (e/(j*i));"$"
   1 (de*(np*a(4
   1 (VALOR)<"A"
   1 "Opcion ?  ";z$
   1 "OTRA PARTIDA ?",A$
   1 "NUMERO DE PUNTOS? : ";np
   1 "NUMERO DE JUGADORES ? ",N:
   1 "MicroHobby Semanal numeros 45 a 48
   1 "MICRO-CALC"
   1 "E-Morselan","F-Micro-cal","G-Caja","H-Boggle","I-Transfer"
   1 "BM  : BORRA MEMORIAS 7,8Y9  ","MEn : STACK 'X' A MEMORIA n ","DEn : FIJAR n DECIMALES     ","Sx  : SUMATORIO             ","Nx  : MENOS SUMATORIO       ","PR  : PROMEDIAR EL SUMATORIO","AJ  : AJUSTE DE RECTA       ","SC  : SCROLL DE MOMORIAS    "," !: FACTORIAL  .K: CONSTANTE"
   1 "A-Anillos","B-Buzo","C-Basket","D-Cofre"
   1 "64"+NPROG)
   1 "5";"cara: ";
   1 "5";"Programa: ";
   1 "5";"Programa inexistente":
   1 "5";"'R' Vuelve al menu"
   1 "5";"'L' Carga el programa";
   1 "32"-I;C$(
   1 "22",CERO;C$(I
   1 "22",CERO;B$
   1 "22",CERO;
   1 "2100401158E401001BEDB0C92158E411004001001BEDB0C9"
   1 "  NOMBRE DEL JUGADOR ";I;"?"
   1 "   Tus movimientos son:"
   1 "   Muchos han sido los osados   que lo intentaron rescatar,pero fracasaron."
   1 "   En una cueva perdida,se haya un gran tesoro custodiado por unpulpo gigante."
   1 "   Ahora tu tienes la oportuni- dad de rescatarlo de las profun-didades del mar."
   1  ZX Spectrum 16-48 K.
   1  SUMATORIO
   1  SCROLL DE MEMORIAS
   1  SALVA EN CINTA 
   1  REALIZA EL CALCULO
   1  PROMEDIA EL SUMATORIO
   1  PERSONALES 
   1  PARO POR STOP
   1  MENSAJES SIN DETENCION
   1  MENSAJES DE ERROR
   1  MENSAJES CON DETENCION
   1  MENOS SUMATORIO
   1  Lorenzo Diaz"
   1  Jugadores 
   1  Inicializacion 
   1  INICIALIZA VARIABLES
   1  IMPRIME MEMORIAS
   1  IMPRIME EL STAC
   1  FIJA DECIMALES
   1  FIJA CONSTANTE
   1  FACTORIAL
   1  DETENCION HASTA ENTER
   1  DESPLAZA EL STACK
   1  DEFINE FUNCIONES
   1  DEBERAS DE IR A                 SOLTAR LAS LLAVES               DE UNA EN UNA":
   1  Codigo Maquina
   1  Car. Graficos 
   1  CANASTAS 
   1  CALCULA CONSTANTE
   1  BUCLE PRINCIPAL 
   1  BORRA MEMORIAS 7,8y9
   1  APUNTA EN MEMORIA
   1  AJUSTE DE RECTA
   1  ******************
   1  * ALMACENAMIENTO *
   1  *    PANTALLAS   *
   1  *       DE       *
   1     UNA      TECLA    
   1     PULSE 
   1      PULSE     UNA     TECLA    
   1          "
   1                          
   1